10 REM *MOVES BASIC TO 16384
23 PRINT"[147]JUST A SECOND":FORX=1TO2500:NEXTX:PRINT"[147]"
24 POKE16*1024,0
25 POKE44,16*4
26 POKE43,1
28 PRINT"LOAD"CHR$(34)"CHAR*"CHR$(34)",8":PRINT"RUN":PRINT"[145][145][145][145][145][145][145][145][145]"
29 POKE631,13:POKE632,13:POKE198,2:END